- -* File RSALES4.FEX
JOIN ORDER01.STORE_CODE IN GGORDER TO STORES01.STORE_CODE
IN GGSTORES AS JOIN0
DEFINE FILE GGORDER
SALE_AMOUNT/D12 = QUANTITY * UNIT_PRICE;
YEAR/YY = ORDER_DATE;
QUARTER/Q = ORDER_DATE;
SALES95/D12 = IF YEAR IS 1995
THEN SALE_AMOUNT
ELSE 0;
SALES96/D12 = IF YEAR IS 1996
THEN SALE_AMOUNT
ELSE 0;
END
TABLE FILE GGORDER
ON TABLE SET PAGE-NUM OFF
SUM SALE_AMOUNT AS '' BY YEAR AS '' BY STORE_NAME
AS 'Store Name' ACROSS QUARTER
HEADING CENTER
"Gotham Grinds"
"Sales Figures for Stores"
"For Fiscal Year &YEAR"
" "
ON TABLE ROW-TOTAL
ON TABLE COLUMN-TOTAL
WHERE YEAR EQ '&YEAR';
ON TABLE HOLD AS RSALES4A FORMAT HTMTABLE
ON TABLE SET STYLE RSALES40
END
-HTMLFORM hsales4
|
- UNITS=IN, PAGESIZE='Letter',
LEFTMARGIN=0.250000, RIGHTMARGIN=0.250000,
TOPMARGIN=0.250000, BOTTOMMARGIN=0.250000, SQUEEZE=ON,
ORIENTATION=PORTRAIT, $
DEFMACRO=LOWSALES, MACTYPE=RULE, WHEN=ROWTOTAL(1)
LT 2750000, $
DEFMACRO=HIGHSALES, MACTYPE=RULE, WHEN=ROWTOTAL(1)
GT 3000000, $
TYPE=REPORT, FOCEXEC=NONE, FONT=ARIAL, SIZE=9, COLOR=BLACK,
BACKCOLOR=NONE,
STYLE=NORMAL, GRID=OFF,$
TYPE=DATA, COLUMN=N2, FOCEXEC=GSALES1(STORE_NAME=N2
YEAR=N1), $
TYPE=DATA, ACROSSCOLUMN=N1, COLOR=RED, STYLE=BOLD,
MACRO=LOWSALES, $
TYPE=DATA, ACROSSCOLUMN=N1, COLOR=TEAL, STYLE=BOLD,
MACRO=HIGHSALES, $
TYPE=TITLE, COLUMN=N2, STYLE=BOLD, $
TYPE=HEADING, LINE=1, OBJECT=TEXT, ITEM=1, STYLE=BOLD,
$
TYPE=HEADING, LINE=2, OBJECT=TEXT, ITEM=1, STYLE=BOLD,
$
TYPE=HEADING, LINE=3, OBJECT=TEXT, ITEM=1, STYLE=BOLD,
$
TYPE=HEADING, LINE=3, OBJECT=TEXT, ITEM=3, STYLE=BOLD,
$
TYPE=ACROSSVALUE, ACROSS=1, STYLE=BOLD, $
TYPE=ACROSSTITLE, ACROSS=1, STYLE=BOLD, $
|
(Sun Microsystems, Inc.)(1997).iso/products/IBI/goback.gif)